$dialog select title "Включение прозрачности слоёв" text "Растровые<raster>|Снимки<image>|Вектора<vector>|2D Объекты<sprite>|Экземпляры 3D объектов<mesh>|Дороги<road>|Дома<house>|Трубы<pipe>|Примитивы<primitive>" ok "Включить"
!ltype = select

!ifdef ltype

$layers !ltype alpha 0.5
!delete ltype

!endif
